package com.nowcoder.community.Utils;

import org.apache.commons.lang3.CharUtils;
import org.apache.commons.lang3.StringUtils;
import org.slf4j.Logger;
import org.slf4j.LoggerFactory;
import org.springframework.stereotype.Component;

import javax.annotation.PostConstruct;
import java.io.BufferedReader;
import java.io.IOException;
import java.io.InputStream;
import java.io.InputStreamReader;
import java.util.HashMap;
import java.util.Map;

/**
 * @author panxingyu
 */
@Component
public class SensitiveFilter {
    private static final Logger LOGGER = LoggerFactory.getLogger(SensitiveFilter.class);

    /**
     * 替换敏感词字符
     */
    private static final String REPLACEMENT = "***";
    /**
     * 定义根节点
     */
    private TrieNode rootNode = new TrieNode();

    /**
     * 根据敏感词初始化前缀树
     */
    @PostConstruct
    public void init() {
        try (
                InputStream is = this.getClass().getClassLoader().getResourceAsStream("sensitive-words.txt");
                BufferedReader reader = new BufferedReader(new InputStreamReader(is));
        ) {
            String keyword;
            while ((keyword = reader.readLine()) != null) {
                this.addKeyword(keyword);
            }

        } catch (IOException e) {
            LOGGER.error("加载敏感词文件失败：" + e.getMessage());
        }
    }

    /**
     * 将敏感词添加到前缀树
     *
     * 根节点为空字符节点，每一轮都是添加下级节点
     */
    private void addKeyword(String keyword) {
        TrieNode tempNode = rootNode;
        for (int i = 0; i < keyword.length(); i++) {
            char c = keyword.charAt(i);
            TrieNode subNode = tempNode.getSubNode(c);
            // 当前字符 前缀树中不存在才添加
            if (subNode == null) {
                subNode = new TrieNode();
                tempNode.addSubNode(c, subNode);
            }
            tempNode = subNode;

            // 结尾字符标记
            if (i == keyword.length() - 1) {
                tempNode.setKeywordEnd(true);
            }
        }
    }

    /**
     * 过滤敏感词方法
     * @param text  待过滤的的字符串
     * @return      过滤后的字符串
     */
    public String filter(String text) {
        if (StringUtils.isBlank(text)) {
            return null;
        }
        // 指针 1
        TrieNode tempNode = rootNode;
        // 指针 2
        int begin = 0;
        // 指针 3
        int position = 0;
        // 过滤后的结果
        StringBuilder sb = new StringBuilder();

        while (begin < text.length()) {
            if (position < text.length()) {
                Character c = text.charAt(position);
                // 当前字符是不是特殊符号
                if (isSymbol(c)) {
                    // 若指针 1 是根节点，说明当前字符不是敏感词，计入结果，移动 指针 2
                    if (tempNode == rootNode) {
                        sb.append(c);
                        begin++;
                    }
                    // 无论指针 1 是不是根节点，指针 3 都要移动；若指针 1 不是根节点，表达的意思是当前字符跳过，不计入结果
                    position++;
                    continue;
                }
                // 检查下级节点
                tempNode = tempNode.getSubNode(c);
                if (tempNode == null) {
                    // 没有下级节点，说明以 begin 开头的字符串不是敏感词
                    sb.append(text.charAt(begin));
                    position = ++begin;
                    tempNode = rootNode;
                } else if (tempNode.isKeywordEnd) {
                    // 发现敏感词，将 begin ~ position 这部分字符串替换
                    sb.append(REPLACEMENT);
                    begin = ++position;
                } else {
                    // 判断下一个字符
                    position++;
                }
            } else {
                // position 越界都未匹配到敏感词，计入结果
                sb.append(text.charAt(begin));
                position = ++begin;
                tempNode = rootNode;
            }
        }
        return sb.toString();
    }

    /**
     * 判断是否是特殊符号
     */
    private boolean isSymbol(Character c) {
        // boolean isAsciiAlphanumeric() ：如果是普通字符，返回 true
        // 0x2E80~0x9FFF 是东亚文字范围
        return !CharUtils.isAsciiAlphanumeric(c) && (c < 0x2E80 || c > 0x9FFF);
    }

    private class TrieNode {
        /**
         * 标识敏感词结尾
         */
        private boolean isKeywordEnd = false;

        /**
         * 子节点(key为子节点的字符，v为子节点)
         */
        private Map<Character, TrieNode> subNodes = new HashMap<>();

        public boolean isKeywordEnd() {
            return isKeywordEnd;
        }

        public void setKeywordEnd(boolean keywordEnd) {
            isKeywordEnd = keywordEnd;
        }

        /**
         * 添加子节点
         */
        public void addSubNode(Character c, TrieNode node) {
            subNodes.put(c, node);
        }

        /**
         * 获取子节点
         */
        public TrieNode getSubNode(Character c) {
            return subNodes.get(c);
        }
    }
}
